<script>on closeFieldget meif the last char of it is RETURN thenput empty into last char of itput it into meend ifput the last word of me into bg fld "Person2"put " " & the first word of me after bg fld "Person2"end closeField</script>
</part>
<part>
<id>2</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>7</left>
<top>160</top>
<right>379</right>
<bottom>272</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <true /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Palatino</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>Movies</name>
<script>on closeFieldget meif the last char of it is RETURN thenput empty into last char of itput it into meend ifput empty into bg fld "Movies2"repeat with x = 1 to the number of lines in meset cursor to "busy"get line x of meif word 1 of it is "A" or word 1 of it is "AN" or word 1 of it is "THE"thenput ","&&(word 1 of it) after itput empty into word 1 of itput empty into char 1 of itend ifput it into line x of bg fld "Movies2"end repeatsort lines of bg fld "Movies2"repeat with x = 1 to the number of lines in bg fld "Movies2"set cursor to "busy"get line x of bg fld "Movies2"if last word of it is "A" or last word of it is "AN" or last word of it is "THE"thenput (last word of it)&" " before itput empty into last word of itput empty into last char of itput empty into last char of itend ifput it into line x of bg fld "Movies"end repeatend closeFieldon mouseDownselect the clickChunkend mouseDownon mouseUplock screenget the selectedTextgo nextfind whole it in bg fld "Movies"unlock screenend mouseUp</script>
</part>
<part>
<id>3</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>6</left>
<top>88</top>
<right>106</right>
<bottom>110</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <false /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Helvetica</font>
<textSize>12</textSize>
<textStyle>bold</textStyle>
<name>New Card</name>
<script>on mouseUpdoMenu "New Card"type TABend mouseUp</script>
<script>on mouseUpget the short name of mepicture it,resource,roundRectend mouseUp</script>
</part>
<part>
<id>22</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>89</left>
<top>1</top>
<right>183</right>
<bottom>15</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <false /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>B</name>
<script>on mouseUpget the short name of mepicture it,resource,roundRectend mouseUp</script>
</part>
<part>
<id>23</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>182</left>
<top>1</top>
<right>236</right>
<bottom>15</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <false /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>C</name>
<script>on mouseUpget the short name of mepicture it,resource,roundRectend mouseUp</script>
</part>
<part>
<id>24</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>235</left>
<top>1</top>
<right>319</right>
<bottom>15</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <false /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>D</name>
<script>on mouseUpget the short name of mepicture it,resource,roundRectend mouseUp</script>
</part>
<part>
<id>25</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>318</left>
<top>1</top>
<right>377</right>
<bottom>15</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <false /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>E</name>
<script>on mouseUpget the short name of mepicture it,resource,roundRectend mouseUp</script>
</part>
<part>
<id>26</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>112</left>
<top>82</top>
<right>188</right>
<bottom>104</bottom>
</rect>
<style>radiobutton</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <false /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Female</name>
<script>on mouseUpif the hilite of me is "true" thenset the hilite of me to "false"set the hilite of bg btn id 27 to "true"elseset the hilite of me to "true"set the hilite of bg btn id 27 to "false"end ifend mouseUp</script>
</part>
<part>
<id>27</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>112</left>
<top>103</top>
<right>188</right>
<bottom>125</bottom>
</rect>
<style>radiobutton</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <false /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Male</name>
<script>on mouseUpif the hilite of me is "true" thenset the hilite of me to "false"set the hilite of bg btn id 26 to "true"elseset the hilite of me to "true"set the hilite of bg btn id 26 to "false"end ifend mouseUp</script>
<script>on mouseUpanswer "You're looking for a:" with "Cancel" or "Movie" or "Person"if it is "Person" thenask "Find whom?"if it is not empty or the result is not "Cancel"then find whole it in bg fld "Person"end ifif it is "Movie" thenask "Find which?"if it is not empty or the result is not "Cancel"then find string it in bg fld "Movies"end ifend mouseUp</script>
</part>
<part>
<id>30</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>5</left>
<top>37</top>
<right>52</right>
<bottom>57</bottom>
</rect>
<style>shadow</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>Number</name>
<script></script>
</part>
<content>
<layer>background</layer>
<id>20</id>
<text><span class="style8"> = total nudity • B = nearly total nudity • C = breasts • D = partial breasts • E = buns F = look fast! • G = possible body double</span></text>
</content>
<name>Data</name>
<script>on openCardglobal thePICTsif (bg fld "Person") is not in thePICTs then hide bg btn "Picture"else show bg btn "Picture"put the number of this card - 1 into bg fld "Number"end openCard</script>